home *** CD-ROM | disk | FTP | other *** search
- .include #system
- .include #stddef
- .include #macros
- .include #cio
- .include #string
-
- _string1 == $F0
- _string2 == $F2
- _tmp1 == $F4
-
- start:
- PRINT 0,"Starting the STRING test",255,@p1+@p3+@s2
- STRCPY buf,"Deutscher Meister",@p1+@s2
- STRLEN buf
- PRINT 0,buf,_tmp1,@p1+@p2+@special
- PUTC 0,155,@p1+@p2+@special
- STRCAT buf," wird nur der VfL",@p1+@s2+@special
- STRLEN buf
- PRINT 0,buf,_tmp1,@p1+@p2+@special
- PUTC 0,155,@p1+@p2+@special
- PRINT 0,"Done"
- rts
-
- buf: .ds 128
-
-